home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Technotools
/
Technotools (Chestnut CD-ROM)(1993).ISO
/
lang_c
/
ctutor2
/
floatsq.c
< prev
next >
Wrap
Text File
|
1985-02-05
|
768b
|
33 lines
float z; /* This is a global variable */
main()
{
int index;
float x,y,sqr(),glsqr();
for (index = 0;index <= 7;index++){
x = index; /* convert int to float */
y = sqr(x); /* square x to a floating point variable */
printf("The square of %d is %10.4f\n",index,y);
}
for (index = 0; index <= 7;index++) {
z = index;
y = glsqr();
printf("The square of %d is %10.4f\n",index,y);
}
}
float sqr(inval) /* square a float, return a float */
float inval;
{
float square;
square = inval * inval;
return(square);
}
float glsqr() /* square a float, return a float */
{
return(z*z);
}